#| fig-height: 18
#| fig-align: center
# Cargar datos de prevalencia de cáncer de mama desde un archivo CSV
PrevalenzMama <- read.table("files/MammakarzinomCSV/PrevalenzMamma.csv", header = TRUE, sep = ";", dec = ",")
# Seleccionar las primeras tres columnas
PrevalenzMama <- PrevalenzMama[, 1:3]
# Renombrar columnas para mayor claridad
colnames(PrevalenzMama) = c("Diagnose", "Jahr", "Anzahl")
# Agregar una columna de color por defecto
PrevalenzMama <- mutate(PrevalenzMama, color = "#F2F4F4")
# Cambiar el color para el diagnóstico específico de "Brustdrüse (C50)"
PrevalenzMama <- mutate(PrevalenzMama, color = if_else(Diagnose == "Brustdrüse (C50)", "#f5d438", color))
# Cargar la librería necesaria para crear el gráfico de burbujas
library(packcircles)
# Calcular la disposición progresiva de los círculos
circle.layout <- circleProgressiveLayout(PrevalenzMama$Anzahl, sizetype="area")
# Ajustar el radio de los círculos
circle.layout$radius <- circle.layout$radius * 0.85
# Generar vértices de los círculos para el gráfico
circle.vertices <- circleLayoutVertices(circle.layout, npoints=50)
# Combinar datos originales con la disposición de los círculos
circle.labels <- cbind(PrevalenzMama, circle.layout)
# Calcular el porcentaje de cada categoría
circle.labels$percent <- round(circle.labels$Anzahl / sum(circle.labels$Anzahl) * 100)
# Crear el gráfico
ggplot() +
geom_polygon(
data = circle.vertices,
aes(y, x, group = id, fill = as.factor(id)),
colour = NA
) +
scale_fill_manual(values = PrevalenzMama$color) +
coord_equal() +
theme_void() +
theme(legend.position = "none") +
geom_text(
data = circle.labels,
aes(y, x, size = Anzahl, label = paste0(percent, "%")),
family = "Ubuntu",
fontface = "bold",
color = "#808080",
show.legend = FALSE
) +
scale_size_continuous(range = c(0.5, 12)) +
labs(
title = "<p><span style='color:#f5d438'>Mammakarzinom</span> ist mit Abstand<br> die<span style='color:#f5d438'> häufigste Krebserkrankung</span> der Frau</p>",
subtitle = "",
caption = "**Prävalenz**: Rohrate pro 100.000 Einwohner in Deutschland (Intervall-Länge: 5 Jahre, 2019)"
) +
theme(
plot.title = element_markdown(
hjust = 0.5,
family = "Ubuntu",
size = 25,
color = "#808080",
face = "bold"
),
plot.caption = element_markdown(
family = "Ubuntu",
hjust = 0.5,
size = 12,
color = "#808080"
)
)Quelle: Das Zentrum für Krebsregisterdaten (ZfKD) im Robert Koch-Institut1
Quelle: Das Zentrum für Krebsregisterdaten (ZfKD) im Robert Koch-Institut1
Quelle: Das Zentrum für Krebsregisterdaten (ZfKD) im Robert Koch-Institut1
erkrankt im Laufe ihres Lebens an Brust krebs
Quelle: Das Zentrum für Krebsregisterdaten (ZfKD) im Robert Koch-Institut1
Quelle: Das Zentrum für Krebsregisterdaten (ZfKD) im Robert Koch-Institut1
Quelle: Das Zentrum für Krebsregisterdaten (ZfKD) im Robert Koch-Institut1
Erkrankt vor dem 50. Lebensjahr
Quelle: Das Zentrum für Krebsregisterdaten (ZfKD) im Robert Koch-Institut1
Neu erkrankungen jährlich.1
Exkurs Geschichte
Halsted verdoppelte die Fünf-Jahres-Überlebensrate9
Krebs in Deutschland für 2019/202010
Quelle: Das Zentrum für Krebsregisterdaten (ZfKD) im Robert Koch-Institut1
Bild: Eine Entscheidungshilfe für Frauen mit einem DCIS11
American Cancer Society13
Brustkrebs Diagnose: Klassifikation20
Molecular Changes Accompanying Disease Progression21
wenn in einer Linie der Familie
Senkt das Risiko um bis zu 50%23
Klinische Untersuchung und Mammographie
Bild aus “The Stanford Medicine 25”26
Entscheidungshilfe Mammographie-Screening-Programm27
Breast Imaging-Reporting and Data System
Bilder: The radiology assistant29
Die histologische Abklärung von Befunden soll durch17
a Lokale Anästhesie b kleiner Einschnitt c Das Biopsiegerät wird durch Ultraschall geführt30
Primärdiagnostik sollen17
Östrogen- und Progesteronrezeptor
Human Epidermal Growth Factor Receptor 2
Grading
Ein Tumor kleiner als 2 cm ohne, oder nur mikroskopisch befallenen Lymphknoten (T1, N0/N1mi) bedarf kein staging17
Staging wann?
Ohne Symptomatik für eine Metastasierung: ab dem UICC Stadium II mit erhöhtem Risiko sowie III und IV
Bei klinischer Verdacht: immer
Schneiden, schneiden, schneiden (RT)…
The Friedman Center34
soll eine Bestrahlung durchgeführt werden.17
Early Breast Cancer Trialists’ Collaborative Group (EBCTCG)35
Early Breast Cancer Trialists’ Collaborative Group (EBCTCG)35
Soll indiziert werden
Verbessert das Gesamtüberleben in Untergruppen von Patientinnen
Distribution und Relevanz cervikaler Lymphknotenmetastasen von Karzinomen der Mamma36
Die LK’s: 0/micro, 1-3, > 3
sollte erfolgen
sollte in folgende Situationen erfolgen
folgenden Bedingungen müssen alle erfüllt werden
kann bei Patientinen mit
Nervenschädigungen/Störungen der Sensibilität, Veränderungen des Blutbildes, Leberfunktionsstörungen, Erbrechen, Hautund Nagelreaktionen, Haarausfall, Wassereinlagerung (Ödeme), Ausschläge, Juckreiz, Fieber, Müdigkeit, Übelkeit, Entzündungen der Mundschleimhaut, Muskel- und Gliederschmerzen, Haut- und Nagelreaktionen, Durchfall, Beeinträchtigungen der Nierenfunktion, Schüttelfrost, Fieber, grippeähnliche Beschwerden, Infektionen, Hitzewallungen, Vaginalblutungen, Herzschaden, Zyklusstörungen, Katarakt, Corneatrübungen und/oder Retinopathie, Sehnervenentzündung, Wadenkrämpfe, Thrombose, Knochenschmerzen…
Geringes absolutes Risiko impliziert geringer absoluter Nutzen41
breast cancer NHS Website
PREDICT: a new UK prognostic model that predicts survival following surgery for invasive breast cancer42
Endokrine-, Chemo- und Antikörpertherapie
Vorstufe, Prämaligne, Risikoläsion, Stage 0
To treat or not to treat
Histologisch und biologisch eine heterogene Erkrankung mit unterschiedlichem Malignitätspotential
Unterscheidung zwischen nicht-progredientem und progressivem DCIS ist aktuell nicht möglich
Leitliniengerechte Therapie